(Fmake_symbol): Harmonize arguments with documentation.

diff --git a/src/alloc.c b/src/alloc.c
index e911dfce35c9a67223da5a1237b82aca5f5f683a..00a03e850d8b22d53b0a21d2278b5f65aa0d932e 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -870,13 +870,13 @@ init_symbol ()
 DEFUN ("make-symbol", Fmake_symbol, Smake_symbol, 1, 1, 0,
   "Return a newly allocated uninterned symbol whose name is NAME.\n\
 Its value and function definition are void, and its property list is nil.")
-  (str)
-     Lisp_Object str;
+  (name)
+     Lisp_Object name;
 {
   register Lisp_Object val;
   register struct Lisp_Symbol *p;
 
-  CHECK_STRING (str, 0);
+  CHECK_STRING (name, 0);
 
   if (symbol_free_list)
     {